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TITLE we Tare $$ = Common NETACP/NETDRIVER macro definitions 
SIDENT 'V04-000" 
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® ® 
* COPYRIGHT (c) 1978, 1980, 1982, 1984 BY s 
* DIGITAL EQUIPMENT CORPORATION, MAYNARD, MASSACHUSETTS. x 
* ALL RIGHTS RESERVED. * 

® 
* THIS SOFTWARE IS FURNISHED UNDER A LICENSE AND MAY BE USED AND COPIED * 
* ONLY IN ACCORDANCE WITH THE TERMS OF SUCH LICEN SE AND ots THE * 
* INCLUSION OF THE ABOVE COPYRIGHT NOTICE. THIS SOFTWARE OR OTHER * 
* COPIES THEREOF MAY NOT BE PROV IDED OR OTHERWISE MADE AVAILABLE TO ANY * 
* OTHER PERSON. NO TITLE TO AND OWNERSHIP OF THE SOFTWARE IS HEREBY * 
* TRANSFERRED. * 
. ® 
* THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE * 
* AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT * 
* CORPORATION. « 
* *® 
* DIGITAL ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIABILITY OF ITS * 
* SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DIGITAL. * 
® ® 
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MODIFIED BY: 


v006 RNGO006 Rod Gam 20-Apr-1983 
Make SGETFLD, SPUTFLD, me SP ARCH and $CLRFLD macros always 
use JSB's to routines. 


vo0o5 RNGOOO0S Roc Gamache 30-Mar-1982 
Add PUSHQ and POPQ macros. Fix the S$DISPATCH macro to 
not attempt to generate CASE statements for symbols 
pn than 64k. Alter the S$SEARCH macro to generate 
ongword JSBs instead of BSBWs in special cases. 
Alter the SGETFLD, $P UTFLD and SCLR LD macros to generate 
longword JSBs instead of BSBWs in special cases. 


v004 TMHO004 Tim Halvorsen 05-May-1982 
Add SETBIT and CLRBIT macros. 
v02-003 speees A. ELDRIDGE 22-Jan-1982 


Changed offsets in $D1SPATCH to used signed_word. 


"MACRO 


-ENDM 


-MACRO 


-ENDM 


"MACRO 


-ENDM 


-MACRO 


-MACRO 
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3 Macro to build a CNF field identifier 


-CNFFLD cnf_id,type,field 
-LONG NFBSC_‘cnf_id'_'field’ 
. CNFFLD 


SCNFFLD cnf_id,type.field,dst 
MOVL #NFBSC_'cnf_id'_‘field',dst 
SCNFFLD 


: Macros to call CNF functions 


SSEARCH op.cnf,typ,fld 
ASSUME NFBSC_OP_EQL EQ 0 


IF IDENTICAL op eql 
- 1F TRUE 
L R1 
- 1F FALSE 
MOVL S*ANFBSC_OP_‘op',R1 
-ENDC 


SCNFFLD cnf,typ.fld,R9 
JSB CNFSKEY_SEARCH 
SSEARCH 


SCLRFLD cnf.typ.fld 
SCNFFLD cnf,typ, fld,R9 
JSB CNFSCLR_FIELD 
SCLRFLD 


SPUTFLD cnf,typ,fld 
SCNFFLD cnf,typ,fld,R9 
JSB CNFSPUT_FIELD 
SPUTFLD 
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-MACRG 


LL: 


SGETFLD cnf,typ,fild 
SCNFFLD cnf,typ,fld,R9 
JSB CNFSGET_FIELD 
SGETFLD 


to update a performance counter 


BUMP WIDTH ADDRESS, LL 
INC'WIDTH ADDRES 


Vv LL 
MNEG*WIDTH #1,ADDRESS 
BUMP 


UPDATE WIDTH, INCR, ADDRESS, ?LL 
ADD'WIDTH INCR, ADDRESS 


BvC LL 
MNEG*WIDTH #1,ADDRESS 


LL: 
UPDATE 
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: This macro translates into the CASEx ane truct ten. It calculates the 
; ‘base’ and ‘‘Limit’ parameters from the < nen. 6 isplecenent> List 

; specfied in the ed | parameter. The dispatch table is set up 

3 such that ~ unspec ibe index value within the bounds of the 

; transfer vector is associated with a diplacement which transfers 

; control to the first location after the CASE statement, i.e., behaves 
; as if the index were out of bounds. 

: Example: 

: SDISPATCH RO,<- ; Message tyne in RO 

: sindex displacement 

: <Cl, NSPSRCV_CI>,- ; Process C1 message 

3 <cC, NSP$RCV~CC>, = ; Process CC message 

: <Dl, NSPS$RCV_DI>,- ; Process DI message 

: - <oCc, NSPS$RCV_DI>,- ; Process DC message 

: BRW NSPSRCV_ILLMSG : Message type unknown 
zMACRO SDISPATCH, INDX, VECTOR, TYPE=W,NMODE=S*#,?MN,?MX,7S,7SS, 222 


-MACRO $DSP1,$DSP1_1 
. IRP +4 _2.$DSP1_1 
$DS $DSP1_-2 


.ENDR 
.ENDM 
~MACRO wast g5esre 1,$DSP2_2 
§P2_1-AND>e2 + § 
*STeneD _QoRD $DSP2_2-S 
.ENDM 


-MACRO $8ND1,$8ND1 15 °aBn 2,.$BND1_3 
ENON $BND2° $8ND1_1,$8ND1_2 


MACRO SeND2, SeND2_1 02. : 
11F zs6npD <*XFFFF>> = $BND2_2, .ERROR $BND2_2 ; Value of $BND2_2 is too Large 
“TIF SBiD2 | 1,$BND2_2-., .=$BND2~2 
.ENDM 
.MACRO $BND  $BND_1, SBND 
. IRP $BND-3, * eoRD “2 
SBNDT ° $BND71 ” SEND. 3 
.ENDR 


ZZ: 
MX: 


$BND GT,<VECTOR> 
LT, <VECTOR> 


vO 


NE TMACROS.MAR; 1 
MN: 
-=SS 
CASE* TYPE INDX ,#<MN=27>,NMODE * <MX=MN> 
< .REPT = MX=MINO1 
-WORD <MX-MND>#2 + 2 
.ENDR 
28 


S$DSP1 <<VECTOR>> 
-=<MX-MN>*#2 + S + 2 
~ENDM 


F 
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MACRO TO SET OR CLEAR A BIT BY BIT NUMBER 


CALL: 
SETBIT BI TNUM,FLAGWORD 


CLRBIT BI1TNUM,FLAGWORD 
BITNUM IS ANY VALID SOURCE OPERAND SECIFY! 
OFFSET FROM THE FLAG BASE TO SET/C 
FLAGWORD IS ANY VALID DESTINATION OPERAND 
-MACRO serait VAL ,FLAG 
eNTYPE $ VAL 
-1F EQ 2_$$_=*x0EF> 
F VAL 
S*AVAL,FLAG,.+1 


LT <VAL-8> 
#<1QVAL>, FLAG 


#VAL,FLAG,.+1 


NG THE BIT 
LEAR 


* We « . 
ee ee 


on 


VAL. FLAG, .+1 

NOM SETBIT 

MACRO CLRBIT VAL,FLAG 
N VAL 

IF EQ. 2 $8_-*x0EF> 
S*AVAL,FLAG,.+1 


ae, tin 


aE SAE 
oO 


<VAL-8> 
#<1@VAL>, FLAG 
@VAL,FLAG,.+1 


FF 
cc VAL .FLAG,.+1 
ND 
CLRBIT 


ss 


H 
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MACRO TO PUSH OR POP A QUADWORD ONTO THE STACK 


CALL: 
PUSHQ LOC 


POPQ Loc 


‘Loc I$ “i R A DOUBLE RSSESTER SET OR A MEMORY LOCATION TO BE 


VED ON THE STAC 
-MACRO PUSHQ LOC 
MOVQ LOC ,-(SP) ; Save LOC on stack 
-ENDM PUSHOQ 
: -MACRO POPQ LOC 
VQ (SP)+,LOC ; Restore LOC 
NDM POPQ 
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